home *** CD-ROM | disk | FTP | other *** search
/ Apple WWDC 1996 / WWDC96_1996 (CD).toast / Technology Materials / MacOS 8 Resources / Developer Tools / Mac OS 8 Interfaces & Libraries / Interfaces / AIncludes / SegLoad.a < prev    next >
Encoding:
Text File  |  1996-05-01  |  2.3 KB  |  105 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        SegLoad.a
  3. ;
  4. ;    Contains:    Segment Loader Interfaces.
  5. ;
  6. ;    Version:    Technology:    System 7.5
  7. ;                Release:    Universal Interfaces 3.0d3 on Copland DR1
  8. ;
  9. ;    Copyright:    © 1984-1996 by Apple Computer, Inc.  All rights reserved.
  10. ;
  11. ;    Bugs?:        If you find a problem with this file, send the file and version
  12. ;                information (from above) and the problem description to:
  13. ;
  14. ;                    Internet:    apple.bugs@applelink.apple.com
  15. ;                    AppleLink:    APPLE.BUGS
  16. ;
  17. ;
  18.     IF &TYPE('__SEGLOAD__') = 'UNDEFINED' THEN
  19. __SEGLOAD__ SET 1
  20.  
  21.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  22.     include 'Types.a'
  23.     ENDIF
  24.     IF FOR_SYSTEM7_ONLY THEN
  25.     IF ¬ GENERATINGCFM THEN
  26. ;
  27. ; CountAppFiles, GetAppFiles, ClrAppFiles, GetAppParms, getappparms, 
  28. ; and the AppFile data structure and enums are obsolete. 
  29. ; They are still supported for writing old style 68K apps, 
  30. ; but they are not supported for CFM-based apps.
  31. ; Use AppleEvents to determine which files are to be 
  32. ; opened or printed from the Finder.
  33. ;
  34.  
  35. appOpen                            EQU        0                    ;Open the Document (s)
  36. appPrint                        EQU        1                    ;Print the Document (s)
  37. AppFile                    RECORD 0
  38. vRefNum                     ds.w    1                ; offset: $0 (0)
  39. fType                     ds.l    1                ; offset: $2 (2)
  40. versNum                     ds.w    1                ; offset: $6 (6)        ; versNum in high byte
  41. fName                     ds        Str255            ; offset: $8 (8)
  42. sizeof                     EQU *                    ; size:   $108 (264)
  43.                         ENDR
  44. ;
  45. ; pascal void CountAppFiles(short *message, short *count)
  46. ;
  47.     IF GENERATINGCFM THEN
  48.         IMPORT_CFM_FUNCTION CountAppFiles
  49.     ENDIF
  50.  
  51. ;
  52. ; pascal void GetAppFiles(short index, AppFile *theFile)
  53. ;
  54.     IF GENERATINGCFM THEN
  55.         IMPORT_CFM_FUNCTION GetAppFiles
  56.     ENDIF
  57.  
  58. ;
  59. ; pascal void ClrAppFiles(short index)
  60. ;
  61.     IF GENERATINGCFM THEN
  62.         IMPORT_CFM_FUNCTION ClrAppFiles
  63.     ENDIF
  64.  
  65. ;
  66. ; pascal void GetAppParms(Str255 apName, short *apRefNum, Handle *apParam)
  67. ;
  68.     IF ¬ GENERATINGCFM THEN
  69.         _GetAppParms:    OPWORD    $A9F5
  70.     ELSE
  71.         IMPORT_CFM_FUNCTION GetAppParms
  72.     ENDIF
  73.  
  74.     ENDIF
  75. ;
  76. ; Because PowerPC applications don’t have segments,
  77. ; UnloadSeg is unsupported for PowerPC.
  78. ;
  79.     IF GENERATING68K THEN
  80. ;
  81. ; pascal void UnloadSeg(void *routineAddr)
  82. ;
  83.     IF ¬ GENERATINGCFM THEN
  84.         _UnloadSeg:    OPWORD    $A9F1
  85.     ELSE
  86.         IMPORT_CFM_FUNCTION UnloadSeg
  87.     ENDIF
  88.  
  89.     ELSE
  90.     ENDIF
  91.     ENDIF
  92.     IF OLDROUTINELOCATIONS THEN
  93. ;
  94. ; pascal void ExitToShell(void )
  95. ;
  96.     IF ¬ GENERATINGCFM THEN
  97.         _ExitToShell:    OPWORD    $A9F4
  98.     ELSE
  99.         IMPORT_CFM_FUNCTION ExitToShell
  100.     ENDIF
  101.  
  102.     ENDIF
  103.     ENDIF ; __SEGLOAD__ 
  104.  
  105.